triangulation_order3_print Subroutine

subroutine triangulation_order3_print(node_num, triangle_num, node_xy, triangle_node, triangle_neighbor)

************80

TRIANGULATION_ORDER3_PRINT prints information about a Delaunay triangulation.

Arguments

Type IntentOptional Attributes Name
integer(kind=4) :: node_num
integer(kind=4) :: triangle_num
real(kind=8) :: node_xy(dim_num,node_num)
integer(kind=4) :: triangle_node(3,triangle_num)
integer(kind=4) :: triangle_neighbor(3,triangle_num)

Variables

Type Visibility Attributes Name Initial
integer(kind=4), public :: boundary_num
integer(kind=4), public, parameter :: dim_num = 2
integer(kind=4), public :: i
integer(kind=4), public :: i4_wrap
integer(kind=4), public :: j
integer(kind=4), public :: k
integer(kind=4), public :: n1
integer(kind=4), public :: n2
integer(kind=4), public :: s
logical, public :: skip
integer(kind=4), public :: t
integer(kind=4), public, allocatable, dimension ( : ) :: vertex_list
integer(kind=4), public :: vertex_num